เมนูนำทาง
Lagged Fibonacci Generator รหัสเทียมของ LFGsเป็นตัวอย่างของรหัสในภาษา C++ ;
sub lfib{ my ($m, $r, $k, $op, $seed) = @_; my (@x, $i); srand($seed ||time); #initialise state with rand for (0 .. $r){ push @x, int(rand($m)); } my $fn = "sub { \$i = (\$i + 1) % $r; \$x[\$i] = (\$x[\$i] $op \$x[(\$i-$k) % $r]) % $m; (shift || 1.0) * \$x[\$i] / $m; }\n"; return eval($fn);}
$rand = lfib(2**48, 607, 273, '+'); #additive LFib, period 2 ** 638$rand2 = lfib(2**64, 1279, 861, '*');#multiplicative LFib, period 2 ** 1340
print &$rand(100) . "\n" . &$rand2() ."\n";
ตัวอย่างของรหัสในภาษาจาวา
public int getRandom(){ Random generator = new Random(); int j = generator.nextInt(90); int k = generator.nextInt(90); int max = Math.max(j, k); int min = Math.min(j, k);
//Fibo is an array that contain Fibonacci's serie long rnd = (fibo[min] + fibo[max])%6 + 1; return (int)rnd;}
เมนูนำทาง
Lagged Fibonacci Generator รหัสเทียมของ LFGsใกล้เคียง
Lagged Fibonacci Generatorแหล่งที่มา
WikiPedia: Lagged Fibonacci Generator http://msdn.microsoft.com/en-us/library/system.ran... http://www.ccs.uky.edu/csep/RN/RN.html http://www.nersc.gov/nusers/resources/software/lib... http://neohumanism.org/l/la/lagged_fibonacci_gener...